home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #2 / Ham Radio 2000 - Volume 2.iso / HAMV2 / ANTENNA / AZPRJ104 / CT2AZ.AWK < prev    next >
Text File  |  1996-11-23  |  1KB  |  36 lines

  1. #ct2az.awk (C) Joseph Mack NA3T 1996, GNU Public License
  2. # Converts .grd files from the contesting program CT into
  3. # AZ_PROJ grid.dat files. Allows drawing of grids worked in
  4. # a contest.
  5. #
  6. # Since CT updates its files after each entry of a contact,
  7. # it is possible to update the AZ_PROJ map (by redrawing it)
  8. # at the same time.
  9. #
  10. # to get output on stdout (the screen) run this command line 
  11. # (can use mawk instead of awk)
  12. # awk -f ct2az.awk your_ct_grid_file.grd
  13. #
  14. # to produce a file
  15. # mawk -f ct2az.awk your_ct_grid_file.grd > ct_grid.dat
  16. #
  17. BEGIN     {
  18.     OFS = ":"
  19.     print "%Generated by ct2az.awk (C) Joseph Mack 1996 NA3T"
  20.     }
  21. # Is the first field a gridsquare?
  22. $1 ~ /[A-z][A-z][0-9][0-9]/{
  23.     # check each band and print an AZ_PROJ grid: line
  24.     if ($3 > 0) {print "grid",50,"",$1,$3 " contacts"}
  25.     if ($4 > 0) {print "grid",144,"",$1,$4 " contacts"}
  26.     if ($5 > 0) {print "grid",222,"",$1,$5 " contacts"}
  27.     if ($6 > 0) {print "grid",432,"",$1,$6 " contacts"}
  28.     if ($7 > 0) {print "grid",903,"",$1,$7 " contacts"}
  29.     if ($8 > 0) {print "grid",1296,"",$1,$8 " contacts"}
  30.     if ($9 > 0) {print "grid",2.3,"",$1,$9 " contacts"}
  31.     if ($10 > 0) {print "grid",3.4,"",$1,$10 " contacts"}
  32.     if ($11 > 0) {print "grid",5.7,"",$1,$11 " contacts"}
  33.     if ($12 > 0) {print "grid",10,"",$1,$12 " contacts"}
  34.     if ($13 > 0) {print "grid",24,"",$1,$13 " contacts"}
  35.     }
  36.